home *** CD-ROM | disk | FTP | other *** search
/ Ahoy 1987 August / Ahoy_Magazine_87-08_1987_Double_L_Side_A.d64 / Free 'N Easy (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  403b  |  11 lines
  1. 10 printchr$(147)"loading data";:forj=700to753:reada:ifa<0ora>255then30
  2. 20 pokej,a:x=x+a:print".";:nextj:print:print:ifx=5958then40
  3. 30 print"error in data...":end
  4. 40 print"the data is loaded,":print
  5. 50 print"sys 700 to activate and deactivate...":end
  6. 60 data169,208,162,2,236,1,3,208,4,169,139,162
  7. 70 data227,141,0,3,142,1,3,96,173,0,2,201
  8. 80 data95,240,3,76,139,227,206,0,2,164,52,165
  9. 90 data51,56,229,49,176,1,136,170,152,56,229,50
  10. 100 data32,205,189,76,116,164
  11.